home *** CD-ROM | disk | FTP | other *** search
- RCS_ID_C="$Id: printfault.c,v 1.3 1993/06/03 23:27:19 ppessi Exp $";
- /*
- * printfault.c --- Print a socket error message (DOS)
- *
- * Author: ppessi <Pekka.Pessi@hut.fi>
- *
- * Copyright © 1993 AmiTCP/IP Group, <amitcp-group@hut.fi>
- * Helsinki University of Technology, Finland.
- * All rights reserved.
- *
- * Created : Sat Mar 20 02:10:14 1993 ppessi
- * Last modified: Fri Jun 4 02:05:44 1993 ppessi
- */
-
- #include <errno.h>
-
- #include <exec/execbase.h>
- extern struct ExecBase *SysBase;
-
- #include <dos/dos.h>
- #include <dos/dosextens.h>
-
- #if __SASC
- #include <proto/dos.h>
- #elif __GNUC__
- #include <inline/dos.h>
- #endif
-
- void
- PrintNetFault(LONG code, const UBYTE *banner)
- {
- struct Process *p = (struct Process *)SysBase->ThisTask;
- BPTR Stderr = p->pr_CES ? p->pr_CES : p->pr_COS;
-
- FPuts(Stderr, banner);
- FPuts(Stderr, ": ");
-
- if (code < __sys_nerr)
- banner = (UBYTE *)__sys_errlist[code];
- else
- banner = (UBYTE *)__sys_errlist[0];
-
- FPuts(Stderr, banner);
- FPuts(Stderr, "\n");
- Flush(Stderr);
- }
-
-